Automatic generation produced by ISE Eiffel

ClassesClustersCluster hierarchyChartRelationsTextContracts
indexing description: "Objects that ..." author: "" date: "$Date$" revision: "$Revision$" class interface DIRECTORY_CLASS create make feature -- Access size: REAL -- in mb caption: STRING path: STRING file_system: KL_WINDOWS_FILE_SYSTEM feature -- initialization make (a_path: STRING) require a_path_exists: a_path /= Void and then (a_path.count > 0) ensure path_set: path = a_path caption_set: caption /= Void and then caption.count > 0 feature -- Output out: STRING invariant caption_exists: caption /= Void path_exists: path /= Void and then path.count > 0 end -- class DIRECTORY_CLASS
ClassesClustersCluster hierarchyChartRelationsTextContracts

-- Generated by ISE Eiffel --

For more details: www.eiffel.com